home *** CD-ROM | disk | FTP | other *** search
/ 8bitfiles.net/archives / archives.tar / archives / commodore-scene-files / Coverdisks / CDU / V4D03.D64 / techno prob (.txt) < prev    next >
Encoding:
Commodore BASIC  |  2019-04-13  |  244 b   |  10 lines
  1. 1 REM ************************
  2. 2 REM * "TECHNO PROB" BY JRF *
  3. 3 REM ************************
  4. 4 :
  5. 5 OPEN 15,8,15, "U0>"+CHR$(10): CLOSE 15
  6. 6 OPEN 15,9,15, "U0>"+CHR$(8):  CLOSE 15
  7. 7 OPEN 15,10,15,"U0>"+CHR$(9):  CLOSE 15
  8. 8 FOR D=8 TO 9: OPEN 15,D,15,"I0"
  9. 9 CLOSE 15: NEXT
  10.